str = "ABCDEFGHIJKL"

main = do
  print $ head str 
  print $ tail str
  print $ take 3 str
  print $ drop 4 str
  print $ str !! 3